home *** CD-ROM | disk | FTP | other *** search
Wrap
;=============================================================================== ; EasyACDDA ©2002 by Alessandro Marinuzzi [Alecos] - EasyACDDA is EuroWare ; EasyACDDA-Install ©2002 by Alessandro Marinuzzi [Alecos] ; $VER: EasyACDDA-Install 1.1 - (14/10/2002) by Alecos ;=============================================================================== (COMPLETE 0) (welcome "\nThis installer script will install EasyACDDA and all related files on your HD.\nEasyACDDA is EuroWare - EasyACDDA ©2002 by Alessandro Marinuzzi [Alecos]\nEMail: alecos@ltsnet.it") ;=============================================================================== ; Procedure which will install the program EasyACDDA into your favorite drawer ;=============================================================================== (set @default-dest (askdir (prompt "Where do you want to install EasyACDDA ?\nThe EasyACDDA drawer will be created if you want.") (help @askdir-help) (default "Sys:Utilities/") ) ) (COMPLETE 10) (set easydir (askbool (prompt "Do you want a drawer for EasyACDDA ?") (help @askbool-help) (default 1) (choices "Yes" "No") ) ) (COMPLETE 20) (if (= easydir 1) (makedir (tackon @default-dest "EasyACDDA") (infos)) ) (if (= easydir 1) (set @default-dest (tackon @default-dest "EasyACDDA")) ) (COMPLETE 30) (copyfiles (source "EasyACDDA") (dest @default-dest) (help @copyfiles-help) (infos) (noposition) ) (COMPLETE 40) ;=============================================================================== ; Procedure which will install the right background image for EasyACDDA ;=============================================================================== (set easyimage (askchoice (prompt "Which type of background image do you want to install ?") (help @askchoice-help) (choices "24 Bit image for Amiga with a Graphic Board" "5 Bit image for Amiga with AGA") (default 0) ) ) (COMPLETE 50) (if (= easyimage 0) (copyfiles (source "Images/EasyACDDA.24bit") (dest @default-dest) (help @copyfiles-help) (newname "EasyACDDA.bkg") ) ) (if (= easyimage 1) (copyfiles (source "Images/EasyACDDA.5bit") (dest @default-dest) (help @copyfiles-help) (newname "EasyACDDA.bkg") ) ) (COMPLETE 60) ;=============================================================================== ; Procedure which will install all docs related to EasyACDDA (EasyACDDA.readme) ;=============================================================================== (copyfiles (source "EasyACDDA.readme") (dest @default-dest) (help @copyfiles-help) (infos) (noposition) ) (COMPLETE 70) ;=============================================================================== ; Procedure which will install all executable files supplied with EasyACDDA ;=============================================================================== (copyfiles (source "C/") (dest "C:") (help @copyfiles-help) (all) ) (COMPLETE 80) ;=============================================================================== ; Procedure which will install all docs for the files supplied with EasyACDDA ;=============================================================================== (set easydoc (askbool (prompt "Copy the docs for the files supplied with EasyACDDA ?") (help @askbool-help) (default 1) (choices "Yes" "No") ) ) (COMPLETE 90) (if (= easydoc 1) (copyfiles (source "Docs") (dest (tackon @default-dest "Docs")) (help @copyfiles-help) (all) ) ) ;=============================================================================== ; Procedure which will quit the installation - EasyACDDA installation completed ;=============================================================================== (COMPLETE 100) (exit "NOTE:\n\nThe users who own a graphic board have to add the task \"Gui4Cli\" to the\npreferences of PicDT (PictureDatatypePrefs) before launching EasyACDDA !")